From aa657633c3821427ffd7d0bcbc4eb076664faaf3 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sun, 11 Mar 2007 21:16:51 +0000 Subject: [PATCH] (type-break-get-previous-count): Repeat previous change here. --- lisp/type-break.el | 11 +++++++---- 1 file changed, 7 insertions(+), 4 deletions(-) diff --git a/lisp/type-break.el b/lisp/type-break.el index e915ab2d1fb..e065e32df54 100644 --- a/lisp/type-break.el +++ b/lisp/type-break.el @@ -579,10 +579,13 @@ integer." (setq file (with-current-buffer (find-file-noselect file 'nowarn) - (save-excursion - (goto-char (point-min)) - (forward-line 1) - (read (current-buffer))))))) + (condition-case nil + (save-excursion + (goto-char (point-min)) + (forward-line 1) + (read (current-buffer))) + (end-of-file + (error "End of file in `%s'" file))))))) file 0))) -- 2.30.2